<?php
error_reporting(E_ERROR | E_PARSE);
//test_house script script created by Robert Cox on April 1st 2011
//Commandline Usage: ./test_house.php commandline (debug)
//URL Usage: http://.../../test_house.php?web=1              <= normal mode
//      -or- http://.../../test_house.php?web=1&debug=1      <= debug mode

// set start time
$mtime = microtime();
$mtime = explode(' ', $mtime);
$mtime = $mtime[1] + $mtime[0];
$starttime = $mtime;

if(isset($_GET['debug'])){
                $debug = TRUE;
                $GLOBALS["debug"] = TRUE;
        } else {
                unset($debug);
        }

if(isset($_GET['web'])){
                $web = TRUE;
                $GLOBALS["web"] = TRUE;
        } else {
                unset($web);
        }


if (isset($debug)) { 
	echo "<br>* * * * *  D E B U G = O N * * * * *<br>";
	if (isset($web)) { 
		echo "<br>* * * * *  W E B = O N  * * * * *<br>";}
}


$status = "";
$testname = "House Ad Test";
$testdesc = "Verify that without targeting a house ad is served";
$testurl = "test_house.php";
$testtime = time();

// Setup the archival file name for the test
$datestamp = date("YmdGis");
$directory = "/http/matchtest/archived_results/houseadtest/";
#$directory = "/tmp/canary_archived_results/houseadtest/";
if(!is_dir($directory)){
	if(!mkdir($directory, 0777)) {
		die('Failed to create directory: '.$directory);
	}
}


$today = date("F j, Y, g:i a");
$random = rand();
$UserAgent="Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US; rv:1.9.2.16) Gecko/20110319 Firefox/3.6.16";
$Targeting="\"house\"";

function TraceInfo($output,$string,$debug) {

        $line_match = array_values(preg_grep("/$string/", $output));
            if (isset($GLOBALS["debug"])) { echo "DEBUG - string:  ".$string."<br>";}
            if (isset($GLOBALS["debug"])) { echo "DEBUG - output:  <br><pre>"; print_r($output); echo "</pre><br>";}
            if (isset($GLOBALS["debug"])) { echo "DEBUG - line_match:<br><pre>"; print_r($line_match); echo "</pre><br>";}
        if(stripos($line_match[0], " = ")){
			$explode = explode(" = ", $line_match[0]); }
        if(stripos($line_match[0], ":")){
			$explode = explode(":", $line_match[0]); }
        if(stripos($line_match[1], ">>>>")){
			$result = $line_match[1]; }
        if (isset($GLOBALS["debug"])) { echo "DEBUG - result:  ".$result."<br>";}
		return $result;
}

// setup command line args (commandline only)

if (isset($argv[1])) { $commandline = $argv[1]; unset($debug);} 

        $AdCallURL = "http://crtldev.aimatch.com:60000";
        $PathInfo = "/canary/hserver/mid=".$testtime."/trace=1";
//        $PathInfo = "/canary/hserver/area=red/mid=1964040319620615/trace=1";
        $Query = "";
        $client_headers[] = sprintf('X-Forwarded-For: %s', $ClientIP);

        $url = "$AdCallURL$PathInfo?$Query";

        $delay = 2500;

        // initilize the curl call
        $ch = curl_init();
        // set useragent
        curl_setopt($ch, CURLOPT_USERAGENT, $UserAgent);
        // Set curl to use $url for http call
        curl_setopt($ch, CURLOPT_URL, $url);
        // show client headers
        curl_setopt($ch, CURLOPT_HEADER, 1);
        // have curl put X-Forwarded-For into headers
        curl_setopt($ch,CURLOPT_HTTPHEADER, $client_headers);
        // store results as the return of curl_exec
        curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
        // Follow redirects
        curl_setopt($ch, CURLOPT_FOLLOWLOCATION, TRUE);		
        // if HTML error 400 over over, fail
        curl_setopt($ch, CURLOPT_FAILONERROR, TRUE);

        $output = curl_exec($ch);
        if (isset($debug)) { echo "<br><pre><hr>HTTP Response Output:<br><br>"; print_r($output); echo "</pre><br><hr>"; }

        $output_array = preg_split('/[\n]/', $output, -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY);

		
        if (isset($debug)) { echo "<br><pre><hr>HTTP Response Output (array):<br><br>"; print_r($output_array); echo "</pre><br><hr>"; }

        //get curl info
        $info = curl_getinfo($ch);
        if (isset($debug)) { echo "<br><pre><hr>CURL Response Info:<br><br>"; print_r($info); echo "</pre><br><hr>"; }


        //close curl connection
        curl_close($ch);

        /** get HTTP return header (code AND text) **/

        $http_response = array_values(preg_grep("/^HTTP/", $output_array));
        $http_array = explode(" ",$http_response[0]);
        $http_return_code = trim($http_array[1]);
        $http_return_text = trim($http_array[2]);
        if (isset($debug)) { echo "<br>DEBUG - HTTP CODE/TEXT: $http_response[0]<br>"; }

        /* check code = 200 and text equal OK, anything else we have an error */

        if ($http_return_text != "OK" || $http_return_code != "200") {
            if (isset($debug)) { echo "***** ALERT - HTTP CODE/TEXT: ".trim($http_response[0])." *****<br>"; }
				echo "HTTP return code/text was not 200/OK". trim($http_response[0])."<br>";
                die;
        }
		
		// count the number of elements in the response array
		$num_elements = count($output_array);
        if (isset($debug)) { echo "The Number Of Elements in the OUTPUT Array are: ".$num_elements." <br>"; }
		
		// format the items in the array as a long concatenated string.
		$y=0;
		while($y <= $num_elements){
			$formatted_output = $formatted_output.$output_array[$y]."\n";
			$formatted_output_web = $formatted_output_web.$output_array[$y]."<br>";
			$y++;
		}
        if (isset($debug)) { echo "The Formatted contents of OUTPUT are: ".$formatted_output_web." *****<br>"; }
        
        $TraceTargeting = TraceInfo($output_array,">>>>");
        if(stripos($TraceTargeting, "house")){
			$message1 = "***** SUCCESS - Targeting matches. Targeting is working: $TraceTargeting";
			$message2 = "***** Writing out Pass to testresults.txt";
			$message3 = "HTTP Response Output:";
			if (isset($web)) { echo $message1."<br>";}
            if (isset($web)) { echo $message2."<br>";}
			if (isset($web)) { echo "<br><pre><hr>".$message3."<br><br>"; print_r($output); echo "</pre><br><hr>"; }
			if (isset($commandline)) { echo $message1."\n\n";}
            if (isset($commandline)) { echo $message2."\n\n";}
			if (isset($commandline)) { echo "\n\n".$message3."\n\n"; print_r($output); echo "\n\n"; }
			$status = "pass";
        }
        else {
			$message1 = "***** ALERT - Targeting doesn't match. Targeting IS NOT WORKING: $TraceTargeting";
			$message2 = "***** Writing out failure to testresults.txt";
			$message3 = "HTTP Response Output:";
            if (isset($web)) { echo $message1."<br>";}
            if (isset($web)) { echo $message2."<br>";}
			if (isset($web)) { echo "<br><pre><hr>".$message3."<br><br>"; print_r($output); echo "</pre><br><hr>"; }
            if (isset($commandline)) { echo $message1."\n\n";}
            if (isset($commandline)) { echo $message2."\n\n";}
			if (isset($commandline)) { echo "\n\n".$message3."\n\n"; print_r($output); echo "\n\n"; }
			$status = "fail";			
		}

        
// Determine if the test was successful


// Write out the information to the testresults.txt file.

$lines = file('/http/matchtest/testresults.txt');
$numitems = count($lines);

// Loop through our array, show HTML source as HTML source; and line numbers too.

if (isset($debug)) { echo "<br><pre><hr>HTTP Response Output:<br><br>"; print_r($lines); echo "</pre><br><hr>"; }

$newfile = $lines[0];
$i=1;
while($i <= $numitems) {
	$pieces = explode("|",$lines[$i]);
	if($testname == $pieces[1]){
		$replaced_line = $status."|".$testname."|".$testdesc."|".$testurl."|".$testtime."\n";
		$newfile = $newfile.$replaced_line;
	}
	else{
		$newfile = $newfile.$lines[$i];
	}
	$i++;
}

if (isset($debug)) { echo "<br><pre><hr>New File Output:<br><br>"; print_r($newfile); echo "</pre><br><hr>"; }

$fp = fopen('/http/matchtest/testresults.txt', 'w');

fwrite($fp, $newfile);
fclose($fp);

// Write out results of the test to a file 
if (isset($web)) { $testfilename = $directory."houseadtest.web.".$status.".".$datestamp.".".$testtime.".txt"; }
if (isset($commandline)) { $testfilename = $directory."houseadtest.commandline.".$status.".".$datestamp.".".$testtime.".txt"; }

if (!$fp1 = fopen($testfilename,'w')) {
    echo "Cannot open file ($testfilename)";
    exit;
}

fwrite ($fp1,$message1."\n\n");
fwrite ($fp1,$message2."\n\n");
fwrite ($fp1,"\n\n".$message3."\n\n".$formatted_output."\n\n");
fclose($fp1);


if (isset($debug)) { phpinfo(); }
?>
